home *** CD-ROM | disk | FTP | other *** search
/ Language/OS - Multiplatform Resource Library / LANGUAGE OS.iso / lisp / elk-2_0.lha / elk-2.0 / lib / xm / ALIASES next >
Encoding:
Text File  |  1992-10-07  |  399 b   |  12 lines
  1. ;;; Map widget names that are longer than 12 chars to shorter names
  2. ;;; to satisfy stupid System V restriction
  3. ;;; (12 chars widget name + '.o' == 14 chars)
  4.  
  5. (set! widget-aliases
  6.   '((bulletin-board  . bulletin-brd)
  7.     (cascade-button  . cascade-btn)
  8.     (file-selection  . file-selectn)
  9.     (scrolled-window . scrolled-win)
  10.     (selection-box   . selectn-box)
  11.     (toggle-button   . toggle-btn)))
  12.